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1  Introduction 


VISTA  is  a  high-level  assembly  language:  its  statements  are  essentially  VIPER  machine 
instructions  [Ker  87]  embedded  in  a  syntax  resembling  that  of  Algol  68.  While  it  does  not 
hide  the  structure  of  the  underlying  machine  in  the  way  that  a  true  high-level  language 
would,  it  does  perform  many  of  the  routine  housekeeping  functions  which  can  otherwise 
distract  the  programmer  and  make  mistakes  more  likely. 

The  advantage  of  a  relatively  simple  language  like  VISTA  is  that  it  does  not  need  a  complex 
compiler.  Not  only  is  the  VISTA  translator  very  much  smaller  and  simpler  than  a  typical 
compiler,  but  also  its  outputs  are  similar  enough  to  the  inputs  to  be  checked  easily.  The 
outputs  are  printable,  and  annotated  in  such  a  way  that  mechanical  checking  is  possible. 

VISTA  is  not  an  inherently  safe  language,  in  the  sense  that  some  specialised  languages 
[Cur  84]  might  be,  though  it  does  limit  the  programmer  to  structures  which  are  reasonably 
free  of  complications.  For  example,  there  are  no  pointers  or  GOTO  statements  in  VISTA. 
If  VISTA  is  used  to  write  safety-critical  software,  the  program  texts  should  be  subjected 
to  static  analysis  with  a  toolset  such  as  MALPAS  or  SPADE.  This  process  is  made  easy 
by  the  design  of  VISTA,  which  includes  only  constructs  which  can  be  analysed  effectively 
by  such  toolsets.  In  fact  the  VISTA  language  was  designed  in  parallel  with  a  translator 
to  the  MALPAS  input  language  [RTP],  and  many  difficulties  were  resolved  by  changes  to 
the  language  structure.  A  translator  for  SPADE  [PVL]  has  also  been  developed. 

This  note  describes  VISTA  in  two  ways:  informally  by  means  of  an  annotated  example  and 
formally  with  a  modified  BNF  grammar.  The  example  uses  most  of  the  constructs  of  the 
language,  though  one  or  two  have  escaped  e.g.  IBCLUDE,  COBTIBUE.  The  grammar  defines 
all  possible  constructs  but  does  not  in  itself  describe  the  semantics  (“meaning”)  of  a  VISTA 
program;  where  this  is  not  obvious  it  is  described  in  the  accompanying  commentary. 

The  following  program  in  VISTA  is  fairly  trivial  and  makes  no  pretensions  to  safety: 
it  reads  in  a  text  and  then  counts  occurrences  of  selected  words  in  that  text.  The  line 
numbers  are  merely  for  reference  in  the  notes  below,  and  are  not  part  of  the  program.  Page 
layout  of  VISTA  programs  is  completely  free:  the  example  follows  normal  conventions  for 
indentation.  Two  pieces  of  hardware  called  keyboard  and  scraan  are  assumed  to  be 
available  for  input  and  output. 

The  only  aspects  which  will  not  seem  reasonably  familiar  are  the  “region  declarations” 
(lines  4  to  7)  which  define  regions  of  memory  into  which  code,  constants,  and  so  on  are  to 
be  placed,  and  the  fact  that  procedures  in  VISTA  are  declared  after  (rather  than  before) 
their  calls.  There  is  no  profound  reason  for  this:  it  simply  seems  more  natural  to  put  the 
main  program  first.  No  “loopholes”  are  allowed  for  recursion,  which  is  forbidden  in  VISTA 
though  a  devious  programmer  with  knowledge  of  the  machine  architecture  can  sneak  it  in 
and  thereby  probably  lose  the  ability  to  analyse  the  program.  Notice  that  i,  X,  T  are 
the  VIPER  machine  registers,  32  bits  each,  and  there  is  a  single  bit  flag  register  called  B. 
X  and  T  (only)  can  be  used  as  indexes. 
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2  VISTA  program  example 


1  PROGRAM  word  frequency  counter. 

2 
3 


4 

CODE 

prog  FROM  0  TO  3999; 

—  aeaory  regions  with  bounds 

6 

COIST  conit  FROM  4000  TO  4095; 

6 

DATA 

data  FROM  16r8000  TO  16r8000+8191; 

r 

o 

PERI 

peri  FROM  0  TO  1; 

o 

9 

BEGII 

10 

IIT 

last,  count.  Batch,  k,  p,  q; 

—  variables  in  DATA  region 

11 

12 

CHAR 

keyboard,  screen; 

—  in  PERI  region 

13 

14 

IIT 

key  [20],  text  [9000]; 

—  more  data,  vectors 

15 

16 

IIT 

sp  -  32,  eof  «  26,  er  »  13; 

—  in  the  COIST  region 

17 

IIT 

Bsl  [  ]  ■  “\nlnput  the  text:  \0\"; 

—  messages 

16 

IIT 

bs2[  ]  «  "\nKeyword:  \0\"; 

19 

IIT 

ms3[  ]  «  "\nluaber  of  occurrences 

is  \0V; 

20 

IIT 

ns4[  ]  ■  "outside  range\0\"; 

21 

22 

--  End  of  variable  end  constant  declarations ,  nos  for  the  program 

23 

24 

A  :• 

1;  CALL  message; 

--  invite  the  user  to  type  . . 

25 

A  :* 

1;  last  :»  A; 

-*  . .  in  a  sample  of  text 

26 

A  :• 

sp;  text[0]  :»  A; 

27 

28  VEILS  (CALL  getchar;  CALL  upper)  A  /*  eof 


29 

DO 

X  :*  last; 

-•in  case  get char  changes  X 

30 

CASE  A  » 

•A’  AID  A  <■  >Z’: 

SXIP;  --  letters 

31 

A  >- 

*0’  AID  A  <■  ’9’: 

SUP  --  digits 

32 

ELSE  A  :• 

•P 

--  all  others 

33 

ESAC; 

34 

text  [X]  :• 

A;  X  X  ♦  1; 

—  store  the  character 

35 

last  :■  X 

36 

OD; 

37 

38 

I  : 

>  last;  A  : 

»  sp;  text[X]  :«  A; 

--  terminator  for  last  word 

39 

40 

REPEAT  A  :«  2; 

DISPLAT  get  new  key  word 

41 

A  :«  0; 

p  A; 

42 
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43  WHILE  (CALL  get char;  CALL  upper)  A  /»  cr 

44  DO  X  :•  p; 

45  key[X]  :«  A:  --  read  A  store  key  cord 

46  X  :«  X  ♦  1; 

47  p  :■  X 

48  OD; 

49 

60  I  :■  p;  A  :■  ep;  key  [I]  :•  A;  —  terminator  1 or  key  word 

61  IF  X  «  0  THEI  BREAK  FI;  —  exit  it  null  key  eord 

62  A  :■  0;  p  :«  A;  count  :•  A; 

53 

64  WHILE  (Y  :•  0;  match  :•  Y;  X  :«  p)  X  <  last 

65  DO  WHILE  (A  :«  key[Y])  A  •  text[X] 

56  DO  IF  A  «  «p 

67  THEI  A  :■  1; 

68  match  :«  A;  --  end  of  eord  A  no  mismatch 

59  BREAK 

60  FI; 

61  X  :■  X  ♦  1; 

62  Y  :«  Y  ♦  1  --  more  letters,  keep  trying 

63  OD; 

64  IF  (A  :*  match;  X  :»  p;  Y  :*  text[X-l)) 

65  A  /*  0  AID  Y  >  sp 

66  THEI  A  :«  count;  --  whole  of  key  matched 

67  A  : *  A  *  1 ;  —  check  space  before  word  .. 

68  count  :=  A  .  don’t  want  to  find  .. 

69  FI;  --  e.g.  "king"  in  "smoking" 

70  X  :»  X  ♦  1;  p  :«  X 

71  OD; 

72 

73  A  : «  3;  CALL  message;  —  print  number  of  matches 

74  A  :•  count;  CALL  print 
76 


76  UITIL  (A  :•  key[0])  A  ■  sp;  —  until  null  key  vord  input 

77  STOP; 

78 

79  —  low  for  the  procedures,  notice  they  folios  the  main  program 

80 

81  PROC  get char:  (WHILE  (A  :»  XIPUT  keyboard)  A  «  0  DO  SKIP  OD); 

82 

83 

84  PROC  upper:  (IF  A  >■  ’a’  AID  A  <■  THEI  A  :■  A-(’a’-'A’)  FI); 

86 


—  unsigned  decimal  output 


86 

87  PROC  print: 

88  BEGII  IIT  lzf lag; 


89 

X  :«  0; 

—  suppress  landing  zeros 

90 

lzf lag  :■  X; 

91 

IF  i  <  0  OR 

i  >  9999  TEES 

92 

ELSE  X  :»  1000 

;  CALL  digit; 

93 

X  :«  100; 

CALL  digit; 

94 

X  10; 

CALL  digit; 

—  4  digits  maximum 

95 

X  1; 

CALL  digit 

96 

FI; 

97 

98 

PROC  digit : 

— 

prints  1  digit  of  number  in  A 

99 

BEGII  1ST  poser; 

X  must  hold  a  poser  of  10,  X  / 

100 

pouar  :»  X; 

101 

Y  :*  0; 

102 

WHILE  i  >* 

poser  DO  A  :* 

A  -  poser;  Y  Y  ♦  1  OD ; 

103 

IF  X  «  1 

OR  Y  >  0  THEB 

lzflag  :«  X  FI; 

104  Y  :=  Y  +  ‘O’;  --  convert  to  iSCII 

105  X  :«  lzf lag; 


106 

IF  1*0 

THES 

Y  :*  sp  FI; 

--  leading  zero 

107 

OUTPUT  Y, 

screen 

108 

ESD 

109 

ESD;  —  of  1 

print" 

110 

111 

112 

PROC  aassaga: 

—  outputs  message  selected  . . 

113 

BEGII  1ST  salact ; 

—  . .  by  A  register,  1  to  4 

114 

salact  :*  A; 

115 

I  :■  0; 

116 

WHILE  TRUE 

—  i.e.  do  forever,  exit  .. 

117 

DO  CASE  (A 

■  salact)  A  IS 

--  . .  by  BREAK  or  RETURK 

118 

1: 

(A  :« 

mil [I] ); 

119 

2: 

< A  :■ 

ms2[X]); 

--  get  4  bytes  from  the  message 

120 

3: 

(A  :• 

ms  3 [X] )  ; 

121 

4: 

(A  :« 

ms4[X]  ) 

122 

ELSE  A 

•  0 

123 

ESAC; 

124 

12S 

Y  A  All 

265; 

--  nos  output  the  characters  . . 

126 

IF  Y  ■  0 

THIS 

RETURI  FI; 

--  . .  terminating  on  a  BULL 

127 

OUTPUT  7, 

screen 

128 

CALL  rig!' 

8; 

129 

IF  Y  •  0 

TIE! 

RETURI  FI; 

—  return  from  "message" 

130 

OUTPUT  Y, 

screen 

131  CALL  rights; 
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132 

IF  T  »  0  TBEI  RETURI  FI; 

133 

OUTPVT  T.  screen; 

134 

CALI,  rights; 

136 

IF  7  •  0  TBEI  RETURI  FI; 

136 

OUTPUT  T,  screen; 

137 

I  :•  Z  ♦  1 

136 

00; 

139 

140 

PROC  rights: 

—  8  place  right  shift 

141 

BEG  1 1 

142 

A  A/2;  A  :«  A/2;  A  A/2; 

A  A/2; 

143 

A  A/2;  A  :«  A/2;  A  :■  A/2; 

A  :»  A/2; 

144 

y  :•  A  AID  265 

146 

EID 

146 

147 

ESP  --  of  "message” 

148 

EID  --of  program 

149 

FIIISB 

s 

Notes  on  the  example  (by  line  number) 

1 

All  programs  begin  with  PROGRAM,  followed  by  an  identifier  which  is  taken  as  a  title.  The 
rest  of  the  title  line  is  ignored  as  comment.  Identifiers  in  VISTA  begin  with  a  lower  -ase 
letter  and  are  made  up  of  lower  case  letters  and/or  digits.  They  can  be  of  any  length 
though  the  translator  will  remember  only  the  first  12  characters.  The  whole  of  a  VISTA 
program  must  be  processed  at  once  -  there  is  no  “separate  compilation”  facility. 


4. .7 


Region  declarations.  All  storage  in  a  VISTA  program  is  allocated  in  a  defined  region,  in 
ascending  order  of  address.  Constants  are  kept  separate  from  data  to  allow  use  of  ROM. 
The  translator  will  report  an  erTor  if  a  region  fills  up,  or  if  region  declarations  overlap. 
The  PERI  region  has  a  separate  address  space  from  the  other  three.  Notice  the  use  of 
decimal  and  hen  numbers  (the  other  bases  allowed  are  2r  for  binary  and  8r  for  octal)  and 
of  constant  expressions  which  can  be  arbitrarily  complex. 

All  the  region  declarations  must  be  at  the  start,  before  the  first  block  opens. 


9 

BECII  marks  the  opening  of  the  main  block.  All  the  data  and  procedure  declarations  of 
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the  program  must  be  within  this  or  within  procedures  enclosed  by  it.  Blocks  may  not  be 
nested,  though  procedures  can  be:  compound  statements  enclosed  by  BECII  . .  EID  or 
round  brackets  (which  are  everywhere  interchangeable)  are  allowed  but  they  may  not 
contain  declarations.  Local  redeclarations  of  variables  within  procedures  take  precedence 
over  less  local  declarations  with  the  same  names,  in  the  usual  way.  Local  redeclarations  of 
scalar  constants  are  required  to  have  the  same  value  as  any  less  local  declarations  which 
may  still  be  in  scope. 


10 

Ordinary  variable  declarations  in  the  DATA  region.  The  only  data  types  allowed  are  IIT 
and  BITS,  and  vectors  thereof.  Both  types  occupy  one  32  bit  word  per  element.  There  is 
no  restriction  on  the  use  of  either.  All  storage  allocation  in  VISTA  is  static.  The  initial 
values  of  variables  are  undefined;  in  a  typical  VIPER  system  they  will  be  the  contents  of 
a  RAM  chip  which  has  just  been  switched  on. 


12 

Peripheral  addresses  in  the  PERI  region,  usable  only  with  IBPUT  or  OUTPUT  (see  lines  81, 
107). 


14 

Vectors  of  variables.  The  lower  bound  is  fixed  at  0.  Only  one  dimension  is  allowed. 


16 

Constants,  to  be  placed  in  the  COIST  region.  These  are  just  ASCII  character  values. 
Wherever  VISTA  expects  a  constant  (e.g.  here  or  as  a  vector  size,  line  14)  a  constant 
expression  can  be  written  using  any  of  the  usual  arithmetic  and  logical  operators.  Once 
declared,  a  named  constant  (e.g.  “eof”)  cam  be  used  in  constant  expressions.  Constants 
declared  as  of  type  BITS  sue  treated  as  unsigned  in  constant  expressions,  as  are  numbers 
denoted  in  hex,  octal,  or  binary.  Decimal  numbers  and  named  constants  of  type  IIT  are 
treated  as  signed.  The  choice  of  operator  (signed  vs.  unsigned)  in  a  constant  expression 
is  based  on  the  type  of  the  left  operand:  the  distinction  matters  in  practice  only  for  the 
operators  >>,  /,  X  (see  below). 

The  operators  permitted  in  constant  expressions,  in  descending  order  of  priority  are: 

•  unary  *  -  I0T  applied  to  primaries  i.e.  single  names  or  numbers,  or  bracketed 
expressions. 

•  <<  >>  left /right  shift  the  left  operand  by  the  number  of  places  given  by  the  right 

operand.  Signed  right  shift  fills  with  copies  of  the  sign  bit,  unsigned  with  zeroes. 


d 
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•  ft  I  bitwise  logical  AND,  OR. 

•  •  /  X  multiply,  divide,  modulo,  defined  as  on  the  host  machine. 

•  ♦  -  add,  subtract. 

Constants  (scalar  or  vector)  cannot  be  assigned  to.  Their  values  are  fixed  irrevocably  by 
the  declaration,  as  they  would  be  in  reality  if  stored  in  ROM. 


17.. 20 


Vectors  of  constants.  These  can  be  given  values  either  as  a  list  of  constant  expressions 
e.g.  (1,  2,  3,  4)  or  (as  here)  a  string  of  7  bit  ASCII  characters.  Characters  are  stored 
four  per  word,  least  significant  first.  Notice  the  special  characters  \n  (line  feed)  and  \0\ 
(character  of  value  0,  used  here  as  a  string  terminator).  Characters  can  also  be  used  as 
individual  constants:  the  declaration  on  line  16  could  equally  well  be  written  as 

I«T  sp  =  ’  ',  eol  =  ’ \26\ ' ,  cr  =  ’\c’; 

Character  constants  generate  the  standard  ASCII  representation  without  parity.  See  Sec¬ 
tion  5  (“initlist”)  for  a  list  of  special  characters. 

22 

Comments  follow  --  as  in  Ada,  and  extend  to  the  end  of  the  line. 


24  et  seq. 

Instructions  are  translated  one-for-one  to  VIPER  machine  instructions.  There  are  three  32 
bit  registers  called  ft,  Z,  Y  of  which  Z  and  Y  can  be  used  as  index  registers.  Y  is  changed 
by  the  CALL  instruction,  but  otherwise  the  registers  can  be  used  interchangeably. 

No  explicit  arguments  are  allowed  with  procedure  calls,  but  ft  and  Z  can  be  used  freely  to 
hand  over  parameters. 

28 

Notice  the  “preface  block”  (CALL  get  char;  CALL  upper)  which  is  optional  before  a 
condition  to  set  up  the  register  contents.  Conditions  generally  compare  a  register  with 
a  variable  or  constant  (not  two  registers  or  two  variables)  but  there  are  also  conditions 
B,  IDT  B,  TRUE,  FALSE  for  special  cases. 
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SO. .S3 


Thi*  form  of  the  VISTA  CASE  statement  requires  an  explicit  predicate  on  each  limb.  A 
single  preface  block  is  allowed  immediately  after  the  word  CiSE.  Conditions  are  tested  in 
the  order  written  and  never  cause  a  change  in  the  register  values;  when  a  condition  is 
found  to  be  true  the  corresponding  limb  is  entered  and  followed  by  exit  from  the  CASE 
statement.  See  comment  on  line  117  for  the  other  form  of  CiSE  statement. 

Notice  the  use  of  AID  as  a  connective  in  conditionals.  Any  number  of  AID  or  OR  connectives 
may  be  used,  but  not  both  in  the  same  condition.  No  brackets  are  allowed.  Without  these 
restrictions  (which  arise  because  of  the  need  to  map  VISTA  statements  into  single  VIPER 
instructions)  it  would  have  been  possible  to  use  a  simple  IF  -  THE1  -  ELSE  here. 

The  SKIP  statement  has  no  effect  (and  generates  no  code)  but  is  provided  for  clarity.  It 
can  be  used  or  omitted  as  preferred. 

32 

The  ELSE  limb  is  optional.  If  it  were  omitted  and  no  condition  was  true,  a  CASE  statement 
would  cause  the  machine  to  stop.  If  you  want  a  CASE  statement  to  do  nothing  in  this 
situation,  use  ELSE  SKIP. 


40 

Loop  constructs  are  WHILE  -  DO  -  OD  and  REPEAT  -  UITIL  . 

DISPLAY  is  an  alternative  form  of  comment  which  is  preserved  in  the  translator  output 
file.  It  does  not  form  part  of  the  program  but  can  be  picked  up  by  other  software  e.g.  the 
VIPER  simulator. 


51 

BREAK  and  COITIIUE  are  valid  only  in  a  WHILE  or  REPEAT  statement.  Their  effect  is, 
respectively: 

•  Exit  from  the  most  local  loop,  i.e.  jump  to  the  statement  following  OD  or  following 
the  condition  after  UITIL. 

•  Proceed  to  the  next  cycle  of  the  most  local  loop,  i.e.  jump  to  the  beginning  of  the 
condition  after  WHILE  or  UITIL. 

The  jump  in  this  case  is  to  line  77 


64.  .05 


This  is  a  fairly  elaborate  condition!  The  whole  thing  compiles  to  6  instructions. 


9 


77 


The  STOP  statement  generates  an  illegal  VIPER  instruction  which  stops  the  processor.  A 
constant  expression  can  be  placed  after  the  STOP,  in  which  case  its  value  will  be  compiled 
into  the  (otherwise  unused)  address  part  of  the  instruction  and  will  be  visible  on  the 
address  bus  when  the  processor  has  stopped.  If  no  expression  is  given,  the  translator  will 
insert  the  address  of  the  instruction. 


81 

Procedure  declarations  in  VISTA  foDow  their  calls,  i.e.  only  forward  reference  is  allowed. 
This  is  logically  more  satisfactory  (the  main  program  comes  first)  and  matches  MALPAS 
better  than  the  traditional  rule  of  declaration  before  use.  Recursion  is  not  in  principle 
possible,  since  the  language  does  not  allow  pointers  of  any  kind. 

Variables  and  constants  (lines  10..20)  must  be  declared  before  use  in  the  conventional  way. 
In  this  and  most  other  respects  VISTA  conforms  to  the  normal  Algol  or  Pascal  block 
structure.  Round  brackets  are  interchangeable  with  BEGII  . .  EID  . 

The  peripheral  location  keyboard  is  assumed  to  deliver  0  until  a  character  is  typed. 


84 

upper  turns  lowet  case  letters  in  1  to  upper  case. 


87 

4  digit  unsigned  decimal  output. 

98 

digit  is  nested  within  print  . 

102 

Division  by  repeated  subtraction,  tince  VIPER  has  (at  present)  no  divide  instruction.  The 
loop  is  never  obeyed  more  than  9  times. 

107 

The  peripheral  location  ccreen  is  assumed  to  make  characters  visible  in  some  way. 
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116 


WHILE  TRUE  gives  an  endless  loop  which  can  he  left  only  by  BREAK  or  (in  a  procedure) 
RETURI. 

117.. 123 

The  strings  output  by  Message  must  be  known  to  the  procedure  in  advance.  It  is 
not  possible  to  hand  over  the  address  of  an  arbitrary  string  since  VISTA  does  not  allow 
pointers.  This  is  an  example  of  the  other  form  of  CASE  statement  in  which  each  limb  has 
either  a  single  selector  value  or  a  bounded  range  of  values  e.g.  1.  .9:  If  the  contents  of 
the  nominated  register  (A  in  this  case)  match  the  selector,  the  limb  is  entered.  Selector 
values  and  bounds  may  be  constant  expressions,  as  usual.  A  minor  variation  replaces  II  by 
UISICIED,  telling  the  translator  to  use  unsigned  tests  when  checking  whether  the  register 
is  within  a  range. 

This  form  of  CASE  is  much  easier  for  programs  like  MALPAS  to  analyse,  e.g.  when  checking 
for  coverage  and  overlap  of  the  conditions. 

126 

A  rero  character  terminates  the  string.  Strings  are  stored  with  the  least-significant  8  bits 
of  the  word  holding  the  first  character.  RETURI  exits  from  the  most  local  procedure  only. 


140 

rights  is  nested  inside  sassage. 


142 

These  are  “arithmetic”  shifts  which  duplicate  the  sign  bit.  Line  144  renders  this  unimpor¬ 
tant.  The  alternative  is  an  end-around  shift  through  B  (e.g.  A  >>  1)  which  in  this  case 
would  do  just  as  well. 


149 

Every  program  ends  nominally  with  7IIISB  though  end-of-file  alone  is  acceptable. 

4  Constructs  not  included  in  the  example 

a  B  :«  TRUE;  B  :■  FALSE 
Direct  setting/clearing  of  the  B  flag. 
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•  IICLUDE  \path\filenane. vis 

Source  text  inclusion  facility.  The  first  non-printing  character  e.g.  space  or  end-of- 
line,  terminates  the  file  name.  There  is  no  default  extension.  The  example  given  is 
of  an  MSDOS  file  name;  the  syntax  is  that  appropriate  to  the  host  machine  on  which 
the  VISTA  translator  is  running.  IICLUDE  files  may  be  nested  up  to  9  deep.  A  list 
of  the  files  used  will  be  printed  at  the  top  of  the  diagnostic  output  file. 

5  Commentary  on  the  grammar  of  VISTA 

A  modified  form  of  the  BNF  grammar  which  follows  is  input  to  the  SID  parser  generator, 
whose  output  forms  the  kernel  of  the  translator.  This  version  of  the  grammar  has  been 
shorn  of  the  “compiling  actions”  which  form  the  interface  to  the  rest  of  the  translator,  but 
do  not  change  the  structure  of  the  language  except  in  the  handling  of  character  strings 
where  the  effect  of  an  absent  action  has  been  embodied  into  the  syntax  for  clarity. 

Terminal  eymbols  e.g.  IUM ,  SEMI ,  BEGII  are  in  capitals,  non-terminals  in  lower  case. 
Comments  are  between  \  . .  \  .  Punctuation  characters  (for  instance  ■  ,  j  )  are 

part  of  the  meta- language  of  this  version  of  BNF:  commas  separate  alternatives  and  the 
last  alternative  of  a  rule  ends  with  a  semicolon.  Empty  alternatives  are  indicated  by  void. 

The  commentary  is  indexed  by  the  names  of  the  non-terminals,  i.e.  those  which  appear  to 
the  left  of  an  «  sign. 


prog 

The  leading  rule.  Every  program  begins  with  PROGRAM  and  a  name;  any  text  following  on 
the  same  line  is  taken  as  comment. 


regions 

A  “region”  declaration  defines  a  bounded  region  of  store  or  peripheral  addressing  space 
into  which  objects  of  appropriate  type  (CODE,  COIST,  DATA  or  PERI)  can  be  placed  by  the 
compiler.  Only  objects  in  DATA  regions  can  be  assigned  to;  only  objects  in  PERI  regions 
can  be  used  in  IIPUT  or  OUTPUT  instructions.  Regions  are  global  to  the  whole  program, 
and  the  space  they  occupy  is  allocated  permanently.  The  address  space  for  PERI  regions 
is  separate  from  the  other  three.  Region  bounds  are  inclusive. 

Several  region  declarations  of  the  tame  type  may  be  made  e.g. 

CODE  tobI  FROM  0  TO  409E; 

CODE  rea2  FROM  65536  TO  65536  ♦  4095; 

Only  one  region  of  each  type  (CODE,  COVST,  DATA,  PERI)  it  in  use  at  any  one  time, 
but  it  can  be  changed  between  declarations  (for  CODE,  between  procedures)  by  writing  e.g. 


12 


CODE  II  roal;  and  reset  to  the  region  previously  in  use  by  e.g.  RESET  CODE;  Changes 
are  stacked  separately  for  each  type  e.g. 


CODE  II  roal; 
CODE  II  roa2; 
RESET  CODE; 
RESET  CODE; 
RESET  DATA; 


DATA  II  raa;  PROC  funl: 
PROC  lun2:  (ate); 

—  restore  status  quo 


(etc); 


A  region  declaration  automatically  sets  the  new  region  as  the  current  one  of  that  type. 
While  a  region  is  in  use,  objects  of  appropriate  type  are  placed  at  successively  increasing 
addresses  within  that  region  until  it  is  full,  when  an  error  message  is  given.  While  a  region 
is  not  in  use  (because  the  programmer  has  changed  to  another  of  the  same  type)  its  current 
loading  position  is  remembered. 

All  the  region  declarations  in  a  program  must  be  grouped  together  at  the  top,  before  the 
main  block  begins. 


block 

VISTA  is  block  structured,  where  a  block  is  either  the  main  program  or  the  body  of 
a  procedure.  Blocks  cannot  be  “nested”  in  VISTA,  except  as  the  bodies  of  procedures: 
BEGII  ..  EID  or  round  brackets  can  be  used  to  group  instructions  (e.g.  for  a  CASE  limb 
where  the  syntax  demands  a  single  instruction)  but  such  a  “compound  statement”  cannot 
include  declarations.  The  present  VISTA  translator  does  not  re-use  memory  allocated 
to  local  variables  which  cannot  be  in  scope  simultaneously,  but  this  is  not  guaranteed  to 
persist  in  future  versions. 

The  scope  rules  are  as  follows: 

•  A  “region”  declaration  is  in  scope  for  the  whole  program. 

•  An  “object"  (variable  or  constant)  declaration  is  in  scope  from  the  point  of  decla¬ 
ration  until  the  end  of  the  main  block  or  of  the  enclosing  procedure,  whichever  is 
smaller. 

•  A  “procedure”  declaration  is  in  scope  from  the  start  of  the  main  block  or  of  the 
enclosing  procedure,  whichever  is  smaller,  until  the  start  of  its  own  declaration. 

The  sequence  within  a  block  is  strictly  defined,  and  is  the  same  whether  the  block  is  the 
main  program  or  a  procedure  body. 

1.  Variable  and/or  constant  declarations  (if  any). 

2.  Main  code,  which  can  be  void  e.g  in  a  program  consisting  entirely  of  procedures. 

3.  Procedure  declarations  which  can  be  interspersed  with  more  variable  or  constant 
declarations  (e.g.  those  used  only  to  communicate  between  procedures)  or  with 
region  changes. 
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BEGII  . .  EID  and  (  )  are  interchangeable  but  must  be  correctly  paired. 


procdec 

No  explicit  arguments  or  return  values  are  allowed.  What  you  do  with  the  registers  is 
up  to  you,  but  remember  that  the  C1IL  instruction  changes  T.  RETURI  changes  no 
register  except  the  program  counter  which  is  not  visible  in  VISTA. 

The  form  PROC  ID  PROM  nnsexp  declares  that  a  procedure  can  be  found  at  the 
absolute  address  given  by  the  unsigned  expression,  and  is  used  to  call  facilities  in  other 
(separately  compiled)  programs  e.g.  in  a  ROM-resident  monitor.  The  monitor  program 
would  contain  a  CODE  region  declaration  starting  FROM  the  same  address. 


objdec 

An  “object”  declaration  allocates  space  in  one  or  other  of  the  current  regions.  Types 
BITS  and  IIT  allocate  space  in  the  DITi  region,  or  in  the  COIST  region  if  the 
object  is  initialised.  Type  CHil  allocates  space  in  the  PERI  region. 

Wherever  a  number  would  be  appropriate  in  VISTA,  a  constant  expression  can  be  written. 
Objects  declared  as  scalar  constants  e.g. 

IVT  aaxron  *  4095; 

can  be  used  in  constant  expressions  -  their  values  are  held  in  the  compiler  as  well  as 
(possibly)  in  the  program.  Scalar  constants  which  will  fit  into  20  bits  are  usually  embedded 
in  literal  instructions  and  not  stored  separately.  Vectors  of  constants  (or  elements  thereof) 

eg 


BITS  tablet  ]  ■  (1.  2.  4,  8.  16,  32,  64,  128); 

cannot  be  used  in  constant  expressions.  They  are  indexed  from  0  up. 

Vectors  of  variables  e.g.  IIT  vec  [100] ;  must  be  declared  with  the  size  (in  32  bit 
words)  and  are  also  indexed  from  0  up,  in  this  case  to  99. 


initlist 

A  vector  of  constants  can  be  initialised  to  a  string,  which  will  be  stored  4  ASCII  bytes  per 
word  without  parity,  least  significant  byte  first.  There  is  no  automatic  terminator,  though 
unfilled  words  will  be  padded  with  nulls.  Certain  special  characters  can  be  included  in 
strings  using  “backslash”  and  a  lower  ease  letter  e.g.  \n,  \c,  \f,  \s,  \t,  V.  \\  for 
respectively  linefeed,  carriage  return,  form  feed,  space,  tab,  quote  (which  would  otherwise 
terminate  the  string)  and  backslash.  An  arbitrary  8  bit  constant  can  be  placed  in  a  string 


(e.g.  ts  a  terminator)  thus:  "A  null- tormina ted  »tring\0\".  Any  of  the  usual  number 

bases  may  be  used. 

Strings  must  normally  fit  within  one  line.  To  extend  a  string  on  to  the  following  line(s), 
end  each  line  with  the  sequence  \e  thus: 

IIT  message [  ]  *  “In  example  of  a  string  ehich  will  not  fit  \e 
comfortably  within  a  single  line"; 

\e  does  not  insert  a  new  line  into  the  string:  an  explicit  \n  (or  \c\n  )  must  be  used, 
exp 

Expressions  are  either  all  constant  or  consist  of  a  variable  only.  Variables  appear  only  in 
instructions.  Unary  minus  or  BOT  are  allowed  only  before  a  primary  e.g.  -(const-1)  is 
allowed  but  -const-1  is  not.  See  the  commentary  on  the  example  program  for  a  list  of 
permitted  operators.  Any  identifiers  used  in  an  expression  must  be  already  declared  and 
in  scope,  see  above  under  “block". 


inst 

The  syntax  of  VIPER  instructions  -  most  of  the  rest  of  VISTA  is  not  VIPER-specific.  Void 
is  allowed  as  an  instruction,  but  SKIP  is  provided  for  clarity  e.g.  as  a  null  branch  in 
CASE  statements.  It  generates  no  code. 

regassign,  indexreg 

Data  registers  (sreg  or  dreg)  are  A,  X,  T.  Index  registers  are  X,  Y  only. 


loopst 

BREAK,  COITIIUE  are  valid  only  in  VHILE  or  REPEAT  statements,  and  transfer  control 
to  the  instruction  following  the  innermost  loop  or  the  start  of  the  controlling  test  of  the 
innermost  loop  respectively. 


casest 

CASE  statements  come  in  two  forms,  one  with  an  explicit  predicate  on  each  limb  (caseitem) 
and  one  with  a  nominated  register  and  a  selection  value  or  range  on  each  limb  (setitem). 
Either  form  can  have  an  optional  ELSE  limb  at  the  end,  but  if  this  is  not  present  the 
translator  will  insert  ELSE  STOP.  In  both  forms,  the  cases  are  tested  in  the  order  written. 
There  is  no  check  for  coverage  or  overlap  between  predicates. 
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condlist 


Conditions  all  correspond  to  single  VIPER  instructions,  which  compare  a  register  with  an 
immediate  or  stored  operand.  To  set  up  the  registers  ready  for  the  comparison,  a  “preface” 
can  be  inserted  thns: 

IF  (A  :■  fred)  A  >  0  TIE* . FI; 

WHILE  (X  :•  index;  A  :«  table [I])  A  /«  0  DO _ OD; 

The  preface  (if  present)  is  part  of  the  test  •  see  COITIWE  above. 

There  is  no  particular  advantage  in  doing  IF  statements  this  way:  compare 

A  :•  fred;  IF  A  >  0  . . . 

but  the  same  is  not  true  for  WHILE  and  REPEAT  statements:  consider 

A  fred;  WHILE  A  >  0  DO  _  ;  A  :«  1;  joe  :*  A  OD; 


condition 

Compound  conditions  can  be  written  using  AID  or  OR  but  not  both,  because  of  the 
restriction  that  each  comparison  is  a  single  VIPER  instruction.  Every  comparison  is 
performed  every  time.  The  only  possible  side  effect  is  a  hardware  error  on  address-out-of 
bounds  e.g.  in 

X  :«  5000000;  IF  A  «  0  AID  T  >»  table [X]  THEB  ...  FI; 

IF  condl  OR  cond2  OR  ...  TEE!  is  compiled  as  (see  VIPER  definition  below) 

TEST  condl 
SET  B  IF  cond2 
SET  B  IF  ... 

IF  I0T  B  GOTO  else-or-fi 
then- code 

IF  condl  AID  cond2  AID  . . .  TEE!  is  compiled  as 

TEST  inverie  of  condl 
SET  B  IF  inveree  of  cond2 
SET  B  IF  ... 

IF  B  GOTO  else-or-fi 
then -code 

“Condition”  includes  TRUE  and  FALSE  for  situations  like  WBILE  TRUE  DO  ...  0D  and 
B,  I0T  B  for  special  occasions. 
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relop 

GZ,  LT  are  unsigned  32  bit  comparisons. 


operand,  unsop 

Things  on  the  right-hand  side  of  a  regas  sign  i.e.  constant  expressions,  variables,  vector 
references.  If  a  constant  expression  can  be  fitted  into  20  bits  it  will  be  handled  as  a  literal, 
otherwise  storage  will  be  allocated  for  it  in  the  current  COIST  region. 

offset 

A  constant  offset  done  at  compile  time,  with  an  optional  run-time  index  in  the  X  or 
T  register. 

variable 

Writes  to  memory  e.g.  frad  :*  i  ,  also  arguments  of  IIPUT  or  DUTPUT. 
function 

These  are  machine  functions ,  not  to  be  confused  with  operators  in  constant  expressions 
even  though  ♦  -  can  be  used  in  either  context.  They  appear  only  after  a  register  name 
(A .  X  or  Y). 


shift 

/2  >>1  «2  <<1  are  the  only  permitted  combinations  in  instructions,  corresponding  to 

the  VIPER  machine  functions.  The  right  operand  is  unrestricted  in  constant  expressions. 
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INTENTIONALLY  BLANK 
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6  VISTA  Grammar 


\****,**************«  Basic  language  structure  ••••••••••*«»**«»*»*»»»\ 

■RULES’ 

prog  «  PROGRAM  ID  ragions  block  cpseoi  FIIISH; 


ragions 

« 

rdac  SEMI, 

rdac  SEMI  ragions; 

\  ill  ragion  dacs  ara  global  \ 

\  . .  and  thara  oust  ba  >«  1  \ 

rdac 

m 

AREA  bounds, 

CODE  bounds, 
datachanga, 
codachanga ; 

\  data  ragion  declaration  \ 

\  AREA  »  COIST,  DATA,  or  PERI  \ 

\  CODE  ragion  declaration  \ 

\  change  currant  ragion  \ 

bounds 

m 

ID  FROM  unsexp  TO  unsexp  ; 

block 

m 

BEGII  dacpart  codapart 
OPEI  dacpart  codapart 

ESD, 

CLOSE; 

dacpart 

z 

void, 

ddac  SEMI  dacpart; 

\  a  void  dacpart  is  allowed  \ 

\  note  CODE  change  not  allowed  \ 

codapart 

« 

inst, 

inst  SEMI  procoda; 

\  notice  this  can  also  ba  void  \ 

procoda 

■ 

codapart , 

procetc  proclist; 

procat c 

■ 

procdac, 

ddac, 

codachanga; 

\  interspersed  data  dacs  . .  \ 

\  . .  or  ragion  changes  . .  \ 

\  . .  but  only  batsaan  PROCs  \ 
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procdec  «  PROC  ID  COLOR  block, 

PROC  ID  PROM  oncaxp; 

proclitt  ■  void, 

SEMI,  \  hav«  marcj  on  spar*  a amis!  \ 

SERI  procot c  proclict; 

\aoooaooooooooooooo  Data  and  channel  declarations  eeeeeeeeeeeeeeeeeeeee\ 


ddec 

« 

objdec. 

datachange; 

objdec 

* 

TYPE  obj  objlist; 

\  data  or  CRAR  dec  \ 

\  TYPE  •  BITS,  IRT,  i 

or  CHAR  \ 

datachange 

* 

AREA  IR  ID, 

\  change  data  region 

\ 

RESET  AREA ; 

\  back  to  old  region 

\ 

codechange 

s 

CODE  II  ID, 

\  change  CODE  region 

\ 

RESET  CODE; 

obj 

* 

ID, 

ID  EQUALS  exp . 

\  not  vith  CHAR!  \ 

ID  OSQ  unsexp  CSQ, 

ID  OSQ  CSQ  EQUALS 

initlist ; 

objlict  ■  void, 

CORRA  obj  objlist; 

initlist  «  OPEI  exp  exlitt  CLOSE, 

QUOTE  <string>  QUOTE;  \  character  string,  see  above  \ 

exlitt  >  void, 

CORRA  exp  exlist; 
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\  Cone  tut  axprassions ,  including  scalar  idantifiars  dadarad  at  COIST  \ 
\  A  scalar  variable  as  an  oparand  is  includad  for  syntactic  raasons  \ 


arp 


unsaxp 


tarm 


factor 


shif tor 


primary 


*  unsaxp, 

PLUS  primary, 
IQT  primary, 
HIIUS  primary; 


»  farm, 

unsaxp  PLUS  tarm, 
unsaxp  KIHUS  tarm; 


•s  factor, 

tarm  TIKES  factor, 
tarm  SLASH  factor, 
tarm  MOD  factor; 


»  shiftor, 

factor  AMPERSASD  shiftor, 
factor  BAR  shiftor; 


\  +ID  or  IDT  ID  still  ..\ 

\  qualifias  as  a  variabla  . .\ 
\  whila  -ID  doas  not  \ 


\  oparators  +  -  \ 


\  oparators  »  /  '/.  \ 


\  opara- ox e  A  I  \ 


■  primary,  \  oparators  >>  <<  \ 

shiftor  GREATER  GREATER  primary, 
shiftor  LESS  LESS  primary; 


IUH, 

BIGIUH,  \  ovar-siza  numbar  \ 

SIZE  ID, 

OPEI  unsaxp  CLOSE; 
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\  Executable  itetementi.  Thit  includes  nearly  ell  the  VIPER-specific  bits  \ 


inst  •  void, 

aims  tat, 

SUP, 

RETURI, 

STOP, 

STOP  exp, 
loopst, 

BEGII  codelist  EHD, 
OPES  codelist  E5D ; 


simstat  *  regassign, 

variable  COLOR  EQUALS  sreg, 

CALL  ID, 

OUTPUT  sreg  COMMA  variable, 

IF  condlist  THEH  eodelist  elsepart  FI, 
casest; 


regassign  *  dreg  COLOB  EQUALS  sreg  , 

dreg  C0L0I  EQUALS  SOT  sreg, 

dreg  C0L0I  EQUALS  operand, 

dreg  C0L0I  EQUALS  sreg  function  unsop, 

dreg  C0L0I  EQUAL'S  sreg  shift  SUM. 

dreg  COLOR  EQUALS  IIPUT  variable, 

B  COLOB  EQUALS  TRUE, 

B  COLOB  EQUALS  FALSE; 


codelist 

*  inst , 

inst  SEMI  eodelist 

elsepart 

■  void, 

ELSE  eodelist; 

loopst 

*  WHILE  condlist 

DO  eodelist  OD, 

REPEAT  eodelist 

UBTIL  condlist. 

BREAK, 

\  legal  only  in  VBILE/REPEAT  \ 

COHTIBUE; 

\  ditto  \ 

\  to  allow  spare  semicolons  \ 
\  those  allowed  in  prefaces  \ 
\  explicit  null  instruction  \ 

\  qualifier  for  diagnostics  \ 
\  compound  statements  \ 
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. . . 

UMIt 

preface 

simplist 

caseitem 

caselist 

signtype 

setitea 

■etlict 

range 


CASE  atateaente 


\ 


*  CASE  caseitem  caselist  ESAC, 

CASE  preface  caseitem  caselist  ESAC, 

CASE  sreg  signtype  setiteo  setlist  ESAC, 

CASE  preface  sreg  signtype  setitea  setlist  ESAC; 


«  BEGII  siaplist  EBD, 
OPEI  siaplist  CLOSE; 


simstat, 

simstat  SEMI  siaplist; 


condition  COLOH  inst; 


«  void, 

SEMI. 

SEMI  caseitem  caselist, 
opsemi  ELSE  codelist ; 


=  II, 

UHSIGIED; 


*  range  C0L0I  inst; 


\  only  assignments  A  calls  . .  \ 
\  . .  allowed  in  prefaces  \ 


\  no  ELSE  present  \ 

\  ditto,  spare  semi  \ 

\  default  limb  \ 

\  default  type  SIGHED  \ 


*  void, 

SEMI, 

SEMI  setitea  setlist, 
opseai  ELSE  codelist; 


■  exp, 

exp  COT  DOT  exp; 
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rtno«H< 


. . 

condlist 

condition 

andlist 

orlist 

cond 

ralop 

op sand 

•Tag 

drog 


Conditions 


\ 


condition, 

prafaco  condition;  \  "prafaca"  statamants  \ 

B. 

■OT  B, 

TROT, 

FUSE, 

cond, 

cond  AID  andlist, 
cond  OR  orlist; 


cond,  \  can’t  mix  AID,  OR  \ 

cond  AID  andlist; 


cond, 

cond  OR  orlist; 


srag  ralop  «xp, 

srag  ralop  ID  indxtail; 


LESS, 

GREATER  EQUALS, 

EQUALS , 

SLASH  EQUALS, 

LESS  EQUALS, 

GREATER, 

LT. 

CE; 

\  VIPER  tost  instructions  \ 

void. 

\  forgito  spara  somicolons!  \ 

SERI; 

DATAREG; 

\  ona  of  A,  X,  T  \ 

DATAREG; 
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Operands  and  Functions 


V 


\ 


operand 

«  exp. 

ID  indxtail, 

I0T  ID  indxtail 

UBS  Op 

*  unsaxp. 

ID  indxtail ; 

\  constant  or  scalar  variable  \ 
\  TSCtor  rsfsrsncs  \ 


indxtail  *  OSQ  offset  CSQ; 


offset 

=  unsexp. 

indexreg , 

indexreg 

PLUS  unsexp. 

indexreg 

HIIUS  unsexp; 

\  non-negative  constant  offset  \ 
\  run-timo  indax  \ 

\  ditto  sith  constant  offset  \ 


variable  *  ID. 

ID  indxtail; 


\  subset  of  "operand"  \ 


indexreg 

function 


shift 


IIDREG;  \  one  of  X,  Y  \ 

PLUS. 

HIIUS, 

ADD,  \  VIPER  machine  functions,  not  to  be  confused  ..  \ 

SUB,  \  ..  vith  operators  in  constant  expressions  \ 

XOR, 

AID, 

■OR. 

AID  I0T; 

SLASH, 

GREATER  GREATER. 

TIHES, 

LESS  LESS; 


Y 


End  of  granaux 
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Using  the  VISTA  translator 


This  description  relates  to  VISTA  Version  5  running  on  an  CBM  PC-compatible  under 
MSDOS  3.3  or  later. 

Tbe  translator  will  print  a  summary  of  the  operating  instructions  if  invoked  without  ar¬ 
guments.  Normally  the  name  of  the  VISTA  source  file  follows  the  program  name;  if  no 
extension  is  given  .VIS  will  be  assumed  e.g.  vista  soureefile 

VISTA  can  generate  two  output  files,  one  containing  diagnostics  and  information  about 
the  memory  layout  of  the  object  program  and  the  other  containing  the  object  program 
itself.  The  files  normally  have  the  same  name  as  the  source,  and  extensions  (respectively) 
.ERR  and  .VOP  but  the  names  of  the  output  files  can  be  changed  by  an  option. 

Options  are  typed  after  the  source  file  name,  separated  by  a  space.  Every  option  begins 
with  a  letter  (upper  or  lower  case  immaterial)  and  may  include  also  a  decimal  number  or 
a  file  name.  Spaces  may  not  appear  within  numbers  or  names,  and  a  space  (or  end-of  line) 
must  appear  after  a  file  name,  but  otherwise  layout  is  unrestricted  e.g. 

viata  soureefile  DSOOO  v  p400b404  j2000o  vopfile 

All  options  have  default  values  which  can  be  found  by  running  the  translator  and  inspecting 
the  statistics  printed  at  the  end.  The  options  available  are  as  follows: 

T  Do  a  trial  translation  only  i.a.  no  .VOP  file 

V  lon-varbosa  output  i.a.  no  comments  in  .VOP  fila. 

Varbosa  .VOP  filas  -are  typically  3  times  as  big. 

F  20  Alloa  for  20  source  filas  i.a.  up  to  19  IICLUDE  filas. 

D  12000  Alloa  for  12000  data  declarations  in  the  program 

(variables  and  constants).  Similarly  P  (procedure 
declarations)  and  B  (region  declarations). 

J  6000  Alloa  for  6000  jumps  -  3  each  par  IF,  WHILE,  REPEAT, 

CASE  in  the  program. 

C  200  Alloa  for  200  different  anonymous  constants  i.a. 

constants  appearing  in  instructions  but  not  dec¬ 
lared  explicitly  aith  names. 

8  1000  Alloa  1000  blocks .  Blocks  ■  procedures  *  2 

0  name  Use  "naae.vop"  and  "name. err"  for  the  tao  output  files. 

Any  extension  typed  sill  be  Ignored.  "0"  is  a  letter. 
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8  VIPER  Machine  Definition 


The  VTPER  machine  has  3  general  purpose  32  fait  registers  (called  i,  X,  T),  a  program 
address  counter  (P),  and  a  single  fait  Boolean  register  (B).  Memory  addresses  occupy  20 
bits,  so  only  the  least  significant  20  bits  of  P  are  meaningful:  loading  a  “1”  into  any  of 
the  top  12  bits  will  cause  the  machine  to  stop. 

All  instructions  occupy  32  bits,  divided  into  a  12  bit  function  code  and  a  20  bit  address. 

I  Function  12  bits  I  Address  20  bits  i 


The  function  code  is  further  divided  into: 

I  RF  |  MF  I  DF  |  CF  I  FF  I 

I  2  bits  I  2  bits  I  3  bits  I  1  bit  I  4  bits  I 

4 - - - 4 - 4 - 4 - - - 4 

Most  instructions  are  of  the  form  D  :■  R  op  K,  where  D  and  R  are  registers  chosen 
from  A  X  7  P.  H  is  either  a  20  bit  literal  constant  or  the  contents  of  a  32  bit  memory 
location.  Memory  addresses  are  limited  to  20  bits,  and  the  machine  will  stop  if  a  computed 
address  (HF  =  2  or  3,  see  below)  exceeds  this  limit. 

RF:  source  register  field 

0  R  is  contents  of  register  A 

1  R .  X 

2  r  ••  ••  ”  .  r 

3  R  "  “  "  "  P  after  incrementing 

HF:  memory  address  control  field 

0  H  is  the  address,  i.e.  20  bit  non-negative  constant 

1  H  is  contents  of  address,  memory  or  peripheral 

2  H  is  contents  of  (address*!)  " 

3  H  is  contents  of  (address+Y)  "  " 

DF:  destination  control  field 


0 

D 

is 

the  A  register 

1 

D 

• 

M  J 

it 

2 

D 

M 

h  y 

It 

3 

D 

H 

M  p 

4 

D 

SI 

tl  p 

"  if  B,  else  do  nothing 

6 

D 

M 

H  p 

if  I0T  B. 

else  do  nothing 

e 

D 

is 

R  in  peripheral  space  } 

see 

7 

D 

is 

H  in  memory  space  ) 

belos 
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The  sequence  in  which  the  CF,  DF,  and  FF  fields  are  inspected  is  important: 


I 

V 


I  CF  ■  1  | 

- 4 

I  no 
V 


I  DF  >»  6  I 


I  no 
V 


I  DF  «  4  I 


I  no 
V 


1  DF  *  E  I 
--------- ---♦ 

I  no 
V 


y« 

— > 


y«* 

- > 


y« 

- > 


y»s 

- > 


The  instruction  is  a  comparison.  The 
DF  field  is  ignored. 


The  instruction  is  "store  R" :  H  sill 
be  used  as  the  destination,  stopping  if 
HF  «  0.  The  FF  field  is  ignored. 


If  B  is  false  do  nothing,  otheruise  ALU 
operation  to  P. 


If  B  is  true  do  nothing,  otheruise  ALU 
operation  to  P. 


I  ALU  operation  to  register  specified  I 
I  by  DF  (in  the  range  0  to  3).  I 


6.1  ALU  operations 


If  CF  «  0  and  DF  <  6,  FF  and  possibly  HF  specify  the  ALU  function: 


FF  » 


0 

1 

2 

3 


10 

11 


D 

1 

D 

D 

D 

D 

D 

D 

D 

D 

D 

D 


■OT  H  i.e.  H  operand  coapleaented 
F  then  P  :■  H  froa  aeaory  space  i.e.  CALL 
H  froa  peripheral  space  >  equivalent 
H  froa  aeaory  space  >  if  H  «  0 
It  ♦  H,  I  :•  carry 
R  ♦  H,  stop  on  overflow 
R  -  H,  B  :■  borrow 
R  -  H,  stop  on  overflow 
R  XOR  H 
R  AID  H 
R  I0R  H 
R  AID  (I0T  H) 
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12.  HF  »  0 
HF  ■  1 

KF  -  2 
HF  «  3 


D  :*  R/2,  sign  bit  copied 
D  :■  R  >>  1  through  B,  i.s.  D31  :■  B, 
CO. .30  :«  R1..31,  B  :■  RO 
D  :«  R  •  2,  stop  ob  overflow 
0  :»  R  «  1  through  B,  i.o.  DO  :■  B, 

Dl. .31  :■  RO. .30,  B  :»  R31 


13 

14 

15 


spur*  instruction,  stop 
spurs  instruction,  stop 
spur#  instruction,  stop 


Note  that  if  the  destinution  is  P  (DF  =  3,  4,  or  5)  only  functions  1,  3,  5,  and  7  are  legal. 
Attempting  to  obey  any  other  will  cause  the  machine  to  stop.  Function  1  operates  only 
on  P ;  if  DF  specifies  any  other  destination  register  the  machine  will  stop. 

The  operation  D  :«  R  can  be  achieved  by  performing  D  :»  R  ♦  0  or  (for  desti¬ 
nations  i,  X,  T)  D  : *  R  ilD  10?  0  which  is  faster.  D  :■  IDT  R  can  be  done  as 
D  :■  R  I0R  0. 


8.2  Comparisons 


If  CF  •  1,  FF  specifies  a  comparison.  Comparisons  never  change  anything  other  than 
B,  apart  from  the  change  in  P  implied  by  continuing  to  the  next  instruction,  and  never 
cause  the  machine  to  stop  unless  a  memory  address  exceeds  20  bits  (HF  =  2  or  3).  For 
comparisons  the  ALU  function  is  forced  to  R  -  H,  and  the  arithmetic  unit  behaves  as 
if  it  had  33  bits  with  initial  sign  extension  and  no  overflow  detection,  allowing  signed  or 
unsigned  comparison  of  32  bit  values. 

The  new  value  of  B  is  derived  from  the  result  of  the  subtraction  as  follows:  bit32  is 
the  conceptual  extra  (33rd)  bit: 


FF 


8 


:•  bit32 


(i.s.  R  <  H) 


:•  10?  bit32 

:■  allrero 

:»  IDT  allzero 

:«  bit 32  OR  allzsro 

:«  IDT  Mt32  AID  IDT  allzero 

:•  borros 

:*  IDT  borrow 


(R  >•  H) 
(R  -  H) 
(R  /«  H) 
(R  <■  H) 
(R  >  H) 
(unsigned  B  <  H) 
(unsigned  R  >•  H) 


FF  «  8  to  15:  ths  sot  of  operations  is  repeated,  but  if  the 
result  is  0  (i.e.  FALSE)  B  is  left  unchanged. 
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9  VIPER  Object  Program  (.VOP)  Format 

VIPER  Object  ProgT&m  files  are  printable,  and  contain  the  information  needed  by  a  pro¬ 
gram  loader,  PROM  programmer,  or  VIPER  simulator.  Only  the  information  within  the 
defined  format  is  significant;  the  remainder  of  each  line  is  undefined  and  can  be  filled 
with  whatever  material  may  be  useful.  The  VISTA  translator  outputs  the  current  loading 
address  and  a  ‘‘reconstructed’'  version  of  each  instruction,  followed  on  some  lines  by  a 
‘‘marker”  showing  the  beginning  of  loops,  procedures  etc. 

The  type  of  every  line  is  indicated  by  tbe  character  in  column  1,  which  is  followed  (in  most 
cases)  either  by  a  string  of  characters,  a  hex  number,  or  a  sequence  of  decimal  numbers. 
Some  types  of  line  have  alternative  decimal  or  hex  forms.  The  defined  formats  must  be 
adhered  to  rigidly. 

In  the  following  description,  underscore  indicates  mandatory  space  characters,  d  stands 
for  a  decimal  digit  (0..9)  and  h  for  a  hex  digit  (0..9,  A..F  or  a..f).  All  other  characters 
stand  for  themselves.  Every  defined  format  must  end  with  a  “white  space”  character  i.e. 
space,  TAB,  or  end-of-line. 


T  any  character  str  ng 
D  any  charae' «r  cring 

Title  an'1  Date  of  program.  These  are  not  mandatory  but  are  generated  by  VISTA  from 
(respectively)  the  PROGRAM  line  which  begins  the  source  file  and  the  date  derived  from 
the  host  operating  sytem. 

C.thhhhhhhh 

C.ddddd.ddddd 


Set  the  currrent  loading  address  i.e  the  address  starting  at  which  subsequent  data  will  be 
loaded  into  memory.  In  the  decimal  form  the  second  5  digit  number  represents  the  least 
significant  16  bits  of  the  address  (0.. 65535)  and  the  first  number  represents  the  rest.  In 
both  forms  the  digits  are  in  the  usual  order  i.e.  most  significant  first.  Addresses  up  to 
16rFFFFF  are  interpreted  as  in  memory.  Addresses  in  the  range  16rl00000  to  16rlFFFFF 
are  treated  by  the  VIPER  simulator  as  in  peripheral  space. 

All  the  digits  must  be  present  in  either  format. 


C.thhhhhhhh 

C_ddd_ddd.ddd.ddd 


Load  the  32  bit  value  given  into  the  location  pointed  to  by  the  current  loading  address, 
add  1  to  the  address,  and  update  the  sumcheck  (see  below).  In  the  decimal  form  the  four 
numbers  (0..255)  represent  the  four  bytes  of  the  value,  most  significant  first.  All  the  digits 
must  be  present. 
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V.thhhhhhhh 


Verify  the  current  sumcheck  against  the  hex  value  given,  and  dear  the  sumcheck.  The 
sumcheck  is  the  32  bit  residue  of  the  sum  of  every  32  bit  value  loaded  plus  its  address, 
since  the  sumcheck  was  last  cleared.  The  sumcheck  is  zero  initially.  All  the  digits  must  be 
present. 

E 

End  of  .VOP  file. 

The  remaining  formats  are  relevant  only  to  a  simulator  or  a  prototyping  system  which 
contains  a  host  computer  of  some  kind.  PROM  programmers  ignore  them. 

i.fhhhhhhhh 

A_ddd_ddd.ddd.ddd 

Format  as  for  C.  Load  the  VIPER  A  register  with  the  32  bit  value  given.  Similar  formats 
exist  for  the  X,  T,  and  P  (program  address)  registers. 

B.TRUE 
B. FALSE 
5 .TRUE 
S.FALSE 

Set/dear  the  B  flag  or  the  internal  STOP  flag. 

H. ddddddd.ddddddd 

I .  ddddddd. ddddddd 

Define  a  memory  or  I/O  region  size,  for  memory  allocation  in  the  simulator.  The  first 
decimal  number  is  the  lowest  address  in  the  region,  the  second  is  the  highest.  In  a  VISTA 
output  these  correspond  to  the  regions  declared  by  the  programmer,  with  the  upper  bounds 
as  actually  used  rather  than  as  declared.  The  bounds  must  be  decimal,  0..  1048575,  but  in 
these  two  formats  leading  zeroes  may  be  omitted. 

V  any  character  string 

The  character  string  is  tbe  name  of  a  file  “used”  by  an  IICLUDE  statement.  Simulators 
can  use  this  information  to  improve  diagnostics. 

Q  any  character  string 

Corresponds  to  DISPLAT  in  the  VISTA  source.  The  character  string  may  be  interpreted 
by  a  simulator  program  or  simply  displayed  as  a  diagnostic. 
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